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Foreword 

The  Federal  Information  Processing  Standards  Publication  Series  of  the  Na¬ 
tional  Bureau  of  Standards  is  the  official  publication  relating  to  standards  adopted  and 
promulgated  under  the  provisions  of  Public  Law  89-306  (Brooks  Bill)  and  under  Part 
6  of  Title  15,  Code  of  Federal  Regulations.  These  legislative  and  executive  mandates 
have  given  the  Secretary  of  Commerce  important  responsibilities  for  improving  the  utili¬ 
zation  and  management  of  computers  and  automatic  data  processing  systems  in  the 
Federal  Government.  To  carry  out  the  Secretary’s  responsibilities,  the  NBS,  through 
its  Institute  for  Computer  Sciences  and  Technology,  provides  leadership,  technical  guid¬ 
ance,  and  coordination  of  government  efforts  in  the  development  of  guidelines  and  stand¬ 
ards  in  these  areas. 

The  establishment  of  COBOL  as  a  Federal  Standard  in  March  1972  marked  a 
milestone  in  the  effort  to  assist  the  Federal  Government  ADP  user  in  stating  data  proc¬ 
essing  applications  in  such  a  way  that  the  programs  and  data  can  be  developed  and 
maintained  with  a  minimum  of  time  and  effort.  In  recognition  of  the  need  to  keep  the 
COBOL  standard  responsive  to  the  requirements  of  Federal  users,  FIPS  Task  Group  9 
was  established  and  was  charged  with  making  recommendations  to  NBS  for  updating 
and  revising  Federal  Standard  COBOL.  The  Task  Group  pursued  their  charge  with  full 
recognition  of  the  activities  of  American  National  Standards  Institute  Committee  X3J4 
and  of  CODASYL  Programming  Languages  Committee. 

The  work  of  X3J4  resulted  in  revised  American  National  Standard  COBOL,  X3.23- 
1974.  FIPS  Task  Group  9  recommended  to  NBS  that  the  revised  National  Standard  be 
adopted  as  revised  Federal  Standard  COBOL. 

Task  Group  9,  recognizing  the  need  to  inform  COBOL  users  of  the  differences  be¬ 
tween  original  Federal  Standard  COBOL  and  the  revised  Federal  Standard,  has  com¬ 
piled  this  publication  which  is  a  handy  reference  to  all  the  changes  made  to  Federal 
Standard  COBOL.  The  National  Bureau  of  Standards  is  pleased  to  have  the  opportunity 
to  make  this  reference  material  available  for  use  by  Federal  agencies. 


R.  M.  Davis,  Director 

Institute  for  Computer  Sciences 
and  Technology 


Abstract 

Since  COBOL  is  a  “living”  language,  in  the  sense  that  it  is  under  constant  de¬ 
velopment  and  clarification,  the  Federal  community  which  relies  heavily  on  COBOL  to 
satisfy  programming  needs  has  a  large  degree  of  assurance  that  COBOL  will  con¬ 
tinue  to  meet  their  needs  as  future  generation  systems  are  introduced.  However,  along 
with  the  advantage  of  having  more  sophisticated  and  better  COBOL  tools  to  meet  new 
systems  requirements,  there  is  a  short  term  disadvantage.  As  clarifications  and  new 
facilities  are  added,  they  interact  with  the  language  specifications  already  standardized, 
and  this  interaction  sometimes  requires  changes  in  source  programs.  An  analysis,  in  the 
form  of  narrative  descriptions  and  syntax  comparisons,  is  provided  to  aid  the  transition 
of  COBOL  programs  from  use  with  compilers  developed  in  accordance  with  the  1968 
COBOL  Standard  (FIPS  PUB  21)  to  compilers  developed  in  accordance  with  the  1974 
COBOL  Standard  (FIPS  PUB  21-1). 
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gram  conversion;  programming  aids;  programming  languages. 
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Explanation.  The  purpose  of  this  publication  is  to  provide  aid  to  the  Federal  community  in 
taking  advantage  of  the  new  facilities  incorporated  into  the  revised  Federal  COBOL  Stand¬ 
ard  (FIPS  PUB  21-1)  while  insuring,  with  a  minimum  of  effort,  that  current  programs  con¬ 
tinue  to  execute  in  a  predictable  manner. 
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Government  Printing  Office,  Washington,  D.C.  20402  (SD  Catalog  Number  C13.52:43).  There 
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ber,  title,  and  SD  Catalog  Number.  Payment  may  be  made  by  check,  money  order,  coupons,  or  de¬ 
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I.  Background 

FIPS  PUB  21,  dated  1972  March  15,  established  the  American  National  Standard  COBOL 
(X3. 23-1968) ,  minus  the  Report  Writer  module,  as  Federal  Standard  COBOL.  The  prime  objec¬ 
tive  of  this  action  was  to  promote  a  high  degree  of  interchangeability  of  COBOL  programs  for 
use  on  a  variety  of  automatic  data  processing  systems. 

Because  of  the  dynamic  nature  of  the  development  and  standardization  activities  for  COBOL  at 
the  National  level,  the  COBOL  specifications  adopted  by  FIPS  PUB  21  have  now  been  ex¬ 
panded  to  include  a  number  of  new  facilities.  In  addition,  a  number  of  clarifications  were 
approved  and  incorporated  in  the  language  specification  which  remove  ambiguities  in  the  other¬ 
wise  unchanged  facilities  previously  incorporated  in  FIPS  PUB  21. 

In  recognition  of  the  needs  of  Federal  Government  agencies  to  have  these  new  COBOL  facilities 
and  clarifications  available  for  their  use,  the  FIPS  Coordinating  and  Advisory  Committee,  with 
the  approval  of  the  National  Bureau  of  Standards,  established  FIPS  Task  Group  9-Federal  Stand¬ 
ard  COBOL,  in  1971.  The  initial  charter  of  FIPS  Task  Group  9  was  to  develop  and  recommend 
a  revised  Federal  COBOL  Standard  to  replace  the  1968  specifications  adopted  by  FIPS  PUB 
21. 

During  this  same  time  period,  the  Conference  on  Data  Systems  Languages  (CODASYL)  and 
the  American  National  Standards  Institute  (ANSI)  were  very  active  in  the  development  and 
standardization,  respectively,  of  facilities  for  inclusion  in  a  revised  National  COBOL  Stand¬ 
ard.  In  order  to  preclude  a  unilateral,  overlapping  effort  at  the  Federal  level,  FIPS  Task  Group 
9  pursued  their  activities  in  full  recognition  of  the  National  efforts  and,  as  a  result,  were  able 
to  recommend  a  revised  Federal  COBOL  Standard  which  complements  the  revised  American 
National  Standard  (X3. 23-1974) . 

Since  COBOL  is  a  “living”  language,  in  the  sense  that  it  is  under  constant  development  and 
clarification,  the  Federal  community  which  relies  heavily  on  COBOL  to  satisfy  their  program¬ 
ming  needs  has  a  large  degree  of  assurance  that  COBOL  will  continue  to  meet  their  data  proc¬ 
essing  needs  as  future  generation  systems  are  introduced.  However,  along  with  the  advantage 
of  having  more  sophisticated  and  better  COBOL  tools  to  interact  with  new  systems  requirements, 
there  is  a  short  term  disadvantage.  As  new  facilities  are  added,  these  new  facilities  must,  in  most 
cases,  interact  with  the  language  specification  already  standardized,  and  this  interaction  some¬ 
times  produces  changes  in  the  behavior  of  language  features  currently  in  use.  In  other  cases, 
implementor-defined  actions  are  deleted  in  favor  of  a  “standard”  action  specified  by  the  language 
itself. 

The  purpose  of  this  publication  is  to  aid  the  Federal  community  to  take  advantage  of  the  new  fa¬ 
cilities  incorporated  into  the  revised  Federal  COBOL  Standard  (FIPS  PUB  21-1)  while  insuring, 
with  a  minimum  of  effort,  that  current  programs  continue  to  execute  in  a  predictable  manner. 

II.  Introduction 

This  publication  provides  two  types  of  information  to  aid  in  the  transitioning  of  COBOL  pro¬ 
grams  from  use  with  compilers  developed  in  accordance  with  the  1968  COBOL  Standard  (FIPS 
PUB  21)  to  compilers  developed  in  accordance  with  the  1974  COBOL  Standard  (FIPS  PUB 
21-1). 

A  detailed  listing  of  language  additions,  deletions,  and  changes  is  provided  in  narrative  form. 
This  listing  is  in  sequence  by  Nucleus  and  Functional  Processing  Module,  as  specified  in  FIPS 
PUB  21-1,  and  is  intended  primarily  for  use  by  the  manager  and  systems  analyst  who  needs  a 
detailed  overview  of  language  changes. 
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In  addition,  a  composite  language  skeleton  is  provided,  which  presents  a  side-by-side  comparison 
of  the  COBOL  General  Formats  in  the  1968  and  and  1974  COBOL  Standards.  This  composite  is 
ordered  by  COBOL  Division,  Section  and  Paragraph.  It  is  intended  primarily  for  use  by  the  pro¬ 
grammer  who  is  responsible  for  making  program  changes. 

These  two  aids  are  presented  in  a  manner  which  allows  them  to  be  used  independently  of  each 
other.  However,  the  aids  may  be  used  in  conjunction  with  each  other  to  effect  a  complete  analysis 
not  only  of  what  features  have  been  added  or  deleted,  but  also  what  specific  syntactic  changes 
must  be  made  to  the  program  to  make  it  acceptable  for  compilation  by  a  compiler  conforming 
to  the  1974  COBOL  Standard. 

III.  Description  of  Narrative  Analysis 

The  narrative  analysis  of  language  changes  (Apendix  A)  is  presented  in  fourteen  sections.  These 
sections  include  the  Nucleus,  the  Functional  Processing  Modules  contained  in  the  1968  and  1974 
COBOL  Standards,  and  the  Reserved  Word  List.  The  Functional  Processing  Modules  are  presented 
in  the  order  in  which  they  appear  in  the  Standards. 

Each  section  of  the  narrative  contains  the  changes  which  apply  to  the  particular  functions  cov¬ 
ered  by  that  Section.  These  changes  are  categorized  according  to  the  following  criteria : 

Additions — All  new  language  capabilities  in  the  1974  COBOL  Standard  are  listed. 

Deletions — All  language  facilities  included  in  the  1968  COBOL  Standard  which  were  deleted 
from  the  1974  COBOL  Standard  are  listed. 

Changes  ( Not  Requiring  Program  Modification) — The  language  elements  listed  under  this 
heading  fall  into  one  of  two  categories: 

(1)  The  language  element  has  had  additional  syntax  and/or  semantics  applied  which  did  not 
change  the  result  of  execution  of  the  facility  a-s  defined  in  the  1968  COBOL  Standard ;  or 

(2)  Language  restrictions  included  in  the  1968  COBOL  Standard  have  been  relaxed  or  de¬ 
leted  which  will  have  no  effect  on  the  programs  written  to  conform  with  these  previous 
restrictions. 

Changes  ( Requiring  Program  Modification) — The  language  facilities  listed  under  this  heading 
fall  into  one  of  two  categories : 

(1)  The  language  facility  has  been  revised  syntactically  so  that  the  function  will  require 
some  degree  of  recoding  before  it  is  acceptable  to  a  compiler  conforming  to  the  1974 
COBOL  Standard ;  or 

(2)  The  behavior  of  the  facility  has  been  revised  so  that  the  use  of  the  function  with  com¬ 
pilers  conforming  to  the  1968  COBOL  Standard  will  not  provide  the  same  results, 
without  a  modification  to  the  program,  when  used  with  compilers  conforming  to  the  1974 
COBOL  Standard. 

Other  Changes — This  category  includes  a  listing  of  all  of  the  elements  which  were  previously 
either  undefined,  implementor-defined,  or  the  specifications  were  ambiguous,  allowing  imple¬ 
mentation  of  the  facility  to  be  interpreted  in  different  ways  by  different  manufacturers.  Pro¬ 
gram  modification  in  this  area  will  depend  on  whether  the  compiler  being  used  interprets  the 
function  in  the  same  manner  as  the  new  language  standard.  Therefore,  each  of  these  changes 
must  be  examined  individually  in  light  of  the  behavior  of  the  function  in  the  compiler  cur¬ 
rently  being  used. 

The  Functional  Processing  Modules  which  represent  new  facilities  not  included  in  the  1968 
COBOL  Standard  are  so  annotated  and  a  list  of  major  functions  is  provided  in  lieu  of  the  cate¬ 
gories  discussed  above. 
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Within  each  category  (additions,  deletions,  etc.),  the  language  elements  are  listed  in  the  order 
in  which  they  are  presented  in  the  1974  COBOL  Standard.  The  titles  which  are  given  for  group¬ 
ing  the  language  elements  are  the  same  as  the  title  of  the  element  in  the  index  of  the  1974 
COBOL  Standard,  thus  providing  a  cross  reference  for  the  reader  who  needs  more  detailed  in¬ 
formation  on  that  particular  topic. 

In  the  1974  COBOL  Standard,  the  Nucleus  and  the  Functional  Processing  Modules  are  each  di¬ 
vided  into  one  or  two  non-null  levels.  The  lowest  non-null  level  supplies  the  elements  necessary  to 
perform  basic  operations;  the  second  level  provides  more  extensive  and  sophisticated  processing 
capabilities.  In  all  cases,  the  low  level  is  a  proper  subset  of  the  high  level.  To  accommodate  this 
concept,  each  element  listed  in  each  category  is  coded  at  the  right-hand  side  of  the  page  with  the 
level  of  the  Nucleus  or  Functional  Processing  Module  in  which  the  element  appears.  In  this  way, 
the  reader  can  differentiate  between  the  changes  which  affect  all  programs  using  only  the  basic 
COBOL  facilities  and  those  changes  which  affect  only  programs  written  using  the  more  extensive 
and  sophisticated  facilities  in  the  1968  COBOL  Standard.  This  code  can  also  be  used  as  a  cross 
reference  for  the  reader  to  the  specific  portion  of  the  1974  COBOL  Standard  where  more  de¬ 
tailed  information  is  available. 


Example  of  use  of  the  narrative : 

Explanation 

—  (Functional  Processing 
Module  name) 

—  (Category) 

—  (Title  cross- 
referencing  the  index 
in  the  Federal  COBOL 
Standard) 

—  (Specific  change) 

—  (Indicates  the  level 
of  the  module  to  which 
the  change  relates) 

Finally,  a  Reserved  Word  List  is  included  which  details  the  COBOL  Reserved  Words  incorpor¬ 
ated  in  the  1968  COBOL  Standard  which  have  been  deleted,  and  the  Reserved  Words  which 
were  added  to  the  1974  COBOL  Standard.  If  any  of  the  Reserved  Words  added  in  the  1974 
COBOL  Standard  appear  as  a  user-defined  word  in  programs  conforming  to  the  1968  COBOL 
Standard,  program  modification  will  be  required  to  substitute  new  user-defined  words. 


Text 


TABLE  HANDLING 


Changes  ( Requiring  Program  Modification ) 
The  SEARCH  Statement 


The  object  of  the  condition  in  the  . . . 


2TBL 


IV.  Description  of  Composite  Language  Skeleton 

The  Composite  Language  Skeleton  compares  the  complete  syntactical  formats  for  the  1968  COBOL 
Standard  (FIPS  PUB  21)  with  the  1974  COBOL  Standard  (FIPS  PUB  21-1).  The  Skeleton  is  or¬ 
dered  by  COBOL  Division,  Section  and  Paragraph  for  the  Identification,  Environment  and  Data 
Divisions.  The  Procedure  Division  statements  are  listed  in  alphabetical  order. 

The  left-hand  column  of  the  Composite  Language  Skeleton  contains  all  of  the  syntactic  formats  for 
the  1968  COBOL  Standard.  The  information  contained  in  the  right-hand  column  differs  depend¬ 
ing  on  the  following  considerations : 

(1)  If  a  language  element  in  the  1974  COBOL  Standard  is  the  same  syntactically  as  it  was 
for  the  language  element  in  the  1968  COBOL  Standard,  the  area  in  the  right-hand 
column  horizontal  with  the  language  element  description  is  blank. 
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(2)  If  the  syntax  for  a  language  element  in  the  1968  COBOL  Standard  has  been  revised  in 
the  1974  COBOL  Standard,  the  changed  syntax  appears  in  the  right-hand  column  direct¬ 
ly  across  from  the  corresponding  syntax  as  it  appeared  in  the  1968  COBOL  Standard. 

(3)  If  a  language  element  in  the  1968  COBOL  Standard  has  been  deleted  from  the  1974 
COBOL  Standard,  a  comment  to  that  effect  appears  in  the  right-hand  column. 

(4)  If  a  language  element  has  been  added  to  the  1974  COBOL  Standard,  the  complete 
syntactic  format  for  new  language  element  appears  in  the  right-hand  column.  The  left- 
hand  column  is  blank. 

When  converting  programs,  without  Report  Writer  statements,  which  conform  to  the  1968 
COBOL  Standard  to  the  1974  COBOL  Standard,  coding  revisions  must  be  made  only  for  those 
language  elements  which  have  been  modified  or  deleted  in  the  1974  COBOL  Standard.  This  in¬ 
formation  can  be  readily  detected  in  the  Skeleton  by  the  existence  of  corresponding  entries  in  both 
columns. 

When  converting  programs  containing  Report  Writer  statements  reflected  in  the  1968  COBOL 
Standard,  extra  care  must  be  taken  since  no  syntax  changes  have  been  made  in  some  cases  where 
the  semantics  have  been  completely  changed  for  the  1974  COBOL  Standard. 

The  notation  used  in  the  Composite  Language  Skeleton  is  the  same  as  that  used  in  American  Na¬ 
tional  Standard  COBOL,  X3. 23-1974  and  American  Standard  COBOL,  X3. 23-1968.  Detailed  ex¬ 
planations  for  the  notation  may  be  found  in  those  documents  in  the  section  “Overall  Language 
Considerations.”  Braces,  {},  enclosing  a  portion  of  a  general  format  indicate  a  choice  of  one 
of  the  options  within  the  braces  must  be  made.  Brackets,  [],  enclosing  a  portion  of  a  general 
format  indicates  that  portion  of  a  general  format  may  be  included  or  omitted  at  the  user’s  option. 
All  underlined  uppercase  words  in  a  clause  or  phrase  are  required,  but  uppercase  words  which  are 
not  underlined  are  optional.  Lowercase  words  are  generic  terms  used  to  represent  COBOL  words, 
literals,  PICTURE  characterstrings,  comment  entries,  or  a  complete  syntactical  entry  that  must 
be  supplied  by  the  user.  The  ellipsis  (...)  represents  the  repetition  of  the  previous  portion  of  a 
format. 
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Section  I — Nucleus 

The  Nucleus  module  consists  of  two  levels:  1NUC  (low  level)  and  2NUC  (high  level). 
ADDITIONS 

Characters  Used  in  Editing 

The  stroke  character  (/)  is  permitted  as  an  editing  character. 

Literals 

Two  quotation  mark  characters  (“  ”)  can  be  included  in  a  nonnumeric  literal  to 
represent  a  single  quotation  mark  character. 

Comment  Lines 

Comment  lines  can  appear  any  place  within  a  program  by  specifying  an  asterisk 
(*)  in  character  position  7  (Indicator  Area) . 

Comment  lines  with  page  ejection  can  appear  any  place  within  a  program  by  spe¬ 
cifying  a  stroke  (/)  in  character  position  7  (Indicator  Area). 

Switches 

Switches,  which  are  implementor-defined,  may  be  either  hardware  or  software 
switches.  Condition-name  may  be  given  the  status  of  an  implementor-defined  switch. 

Collating  Sequence 

The  PROGRAM  COLLATING  SEQUENCE  clause  of  the  OBJECT-COMPUTER 
paragraph  specifies  the  collating  sequence  to  apply  to  the  program  if  other  than 
the  native  collating  sequence  of  the  computer  is  desired. 

The  alphabet-name  clause  in  the  SPECIAL-NAMES  paragraph  provides  the 
mechanism  for  relating  a  name  to  a  specific  character  code  set  and/or  collating 
sequence. 

The  PICTURE  Clause 

Alphabetic  PICTURE  character-strings  may  contain  the  character  ‘B\ 

The  REDEFINES  Clause 

The  object  of  a  REDEFINES  clause  can  be  subordinate  to  an  item  described 
with  the  OCCURS  clause. 

The  SIGN  Clause 

The  SIGN  clause  specifies  the  position  and  the  mode  of  representation  of  the 
operational  sign  when  it  is  necessary  to  describe  these  properties  explicitly. 

Procedure  Division 

In  the  Procedure  Division,  a  section  may  contain  zero  or  more  paragraphs  and  a 
paragraph  may  contain  zero  or  more  sentences. 

Arithmetic  Statements 

The  GIVING  identifier  series  clause  of  the  arithmetic  statements  (ADD,  SUB¬ 
TRACT,  MULTIPLY  and  DIVIDE)  allows  storage  of  the  results  of  the  arith¬ 
metic  computation  in  more  than  one  separate  area. 


*  The  capability  to  specify  a  user-defined  collating  sequence  (literal  phrase  of  the 
alphabet-name  clause)  was  added  to  2NUC  only. 
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Section  I — Nucleus  (continued) 


ADDITIONS  (continued) 

The  unary  -f-  is  permitted  in  arithmetic  expressions. 

The  identifier  series  of  the  COMPUTE  statement  allows  more  than  one  data  item 
to  be  assigned  an  arithmetic  value. 

The  INTO  identifier  series  clause  of  the  DIVIDE  statement  allows  division  of 
more  than  one  set  of  values. 

The  remainder  item  in  a  DIVIDE  statement  can  be  numeric  edited. 

The  BY  identifier  series  clause  of  the  MULTIPLY  statement  allows  multiplica¬ 
tion  by  more  than  one  set  of  values. 

The  ACCEPT  Statement 

The  DAY,  DATE  and  TIME  clauses  were  added  to  the  ACCEPT  statement.  This 
allows  the  programmer  access  to  the  internally  stored  day,  date  or  time, 
day,  date  or  time 

The  INSPECT  Statement 

The  INSPECT  statement  tallies  or  replaces  occurrences  of  a  single  character 
or  group  of  characters  in  a  data  item.  This  replaces  the  EXAMINE  statement. 

The  MOVE  Statement 

A  scaled  integer  item  may  be  moved  to  an  alphanumeric  or  alphanumeric-edited 
item. 

The  PERFORM  Statement 

In  the  Format  4  PERFORM  statement,  identifier  need  not  be  described  as  an  in¬ 
teger  in  the  VARYING  clause. 

The  STRING  Statement 

The  STRING  statement  provides  juxtaposition  of  the  partial  or  complete  con¬ 
tents  of  two  or  more  data  items  into  a  single  data  item. 

The  UNSTRING  Statement 

The  UNSTRING  statement  causes  contiguous  data  in  a  sending  field  to  be  sepa¬ 
rated  and  placed  into  multiple  receiving  fields. 

DELETIONS 

The  Identification  Division 

The  REMARKS  paragraph  in  the  Identification  Division  was  deleted.  It  was  re¬ 
placed  by  an  asterisk  (*)  or  stroke  (/)  in  character  position  7  (Indicator 
Area). 

The  EXAMINE  Statement 

The  EXAMINE  statement  was  deleted.  It  was  replaced  by  the  INSPECT  state¬ 
ment. 

The  NOTE  Statement 

The  NOTE  statement  was  deleted.  It  was  replaced  by  an  asterisk  (*)  or  stroke 
(/)  in  character  position  7  (Indicator  Area). 
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Section  I — Nucleus  (continued) 

CHANGES  ( REQUIRING  PROGRAM  MODIFICATION) 

Continuation  of  Lines 

Continuation  of  Identification  Division  comment-entries  must  not  have  a  hyphen 
in  character  position  7  (Indicator  Area). 

Qualification 

Complete  set  of  qualifiers  for  a  name  may  not  be  the  same  as  the  partial  list  of 
qualifiers  for  another  name. 

The  CURRENCY  SIGN  Clause 

The  characters  ‘L\  ‘/’,  and  ‘  =  ’  may  not  be  used  in  the  CURRENCY  SIGN  clause 
of  the  SPECIAL-NAMES  paragraph. 

Data  Division 

All  items  which  are  immediately  subordinate  to  a  group  level  must  have  the  same 
level-number. 

No  entry  with  a  lower  level-number  can  appear  between  the  redefined  and  the  re¬ 
defining  items. 

CHANGES  ( REQUIRING  PROGRAM  MODIFICATION)  (continued) 

The  PICTURE  Clause 

An  asterisk  used  as  a  zero  suppression  symbol  in  a  PICTURE  clause  and  the 
BLANK  WHEN  ZERO  clause  may  not  appear  in  the  same  entry. 

The  VALUE  Clause 

A  signed  numeric  literal  cannot  be  used  in  a  VALUE  clause  unless  it  is  associated 
with  a  signed  PICTURE  character-string. 

If  an  item  is  numeric-edited,  the  literal  in  the  VALUE  clause  must  be  nonnu¬ 
meric. 

Conditions 

In  relation  and  sign  conditions,  arithmetic-expression  must  contain  at  least  one 
reference  to  a  variable. 

The  DISPLAY  Statement 

In  the  DISPLAY  statement,  numeric  literals  must  be  unsigned  integers. 

The  STOP  Statement 

If  the  operand  in  the  STOP  statement  is  a  numeric  literal,  it  must  be  an  unsigned 
integer. 

CHANGES  (NOT  REQUIRING  PROGRAM  MODIFICATION) 

Punctuation 

Punctuation  rules  have  been  relaxed  to  allow  space  preceding  a  comma,  period 
and  semicolon,  and  preceding  or  following  a  left  parenthesis  (except  in  a  PIC¬ 
TURE  character-string). 

Semicolon  and  comma  are  interchangeable. 
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Section  I — Nucleus  (continued) 

CHANGES  ( NOT  REQUIRING  PROGRAM  MODIFICATION)  (continued) 

Reference  Format 

Level-numbers  02  through  49  entries  may  appear  anywhere  to  the  right  of  Mar¬ 
gin  A. 

Conditions 

The  word  ‘TO’  is  not  required  in  the  relation  condition  ‘EQUAL  TO’. 
Working-Storage  Section 

Level  77  items  need  not  precede  level  01  entries. 

The  GO  TO  Statement 

The  word  ‘TO’  is  not  requird  in  the  GO  TO  statement. 

The  PERFORM  Statement 

There  is  no  logical  difference  between  fixed  and  fixed  overlayable  segments  in 
the  PERFORM  statement. 

OTHER  CHANGES  (See  Paragraph  III  above) 

Mnemonic-Name 

Mnemonic-name  must  have  at  least  one  alphabetic  character. 

Qualification 

Number  of  qualifiers  permitted  must  be  at  least  five. 

The  PICTURE  Clause 

PICTURE  character-string  is  limited  to  30  characters. 

The  number  of  digit  positions  that  can  be  described  by  a  numeric  PICTURE 
character-string  cannot  exceed  18. 

Conditions 

Use  of  NOT  and  the  left  and  right  parentheses  in  abbreviated  combined  condi¬ 
tions  was  clarified  so  that  all  subjects  and  operators  required  for  expansion  of 
any  portion  of  an  abbreviated  combined  condition  must  be  included  in  the  same 
set  of  parentheses. 

The  numeric  test  in  class  condition  cannot  be  used  with  a  group  item  composed 
of  elementary  items  described  as  signed. 

Comparisons 

In  the  comparison  of  a  numeric  operand  to  a  nonnumeric  operand,  the  numeric 
operand  is  treated  as  though  it  were  moved  to  an  alphanumeric  item  of  the  same 
size,  and  the  contents  of  this  alphanumeric  item  were  then  compared  to  the  non¬ 
numeric  operand. 

Arithmetic  Statements 

The  composite  of  operands  requirements  has  been  added  to  the  MULTIPLY  and 
DIVIDE  statements. 
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Section  I — Nucleus  (continued) 

CHANGES  ( NOT  REQUIRING  PROGRAM  MODIFICATION)  (continued) 

The  PERFORM  Statement 

Changing  the  variable  in  the  FROM  phrase  of  the  Format  4  PERFORM  state-  2NUC 
ment  during  execution  can  affect  the  number  of  times  the  procedures  are  ex¬ 
ecuted  if  more  than  one  AFTER  phrase  is  specified. 

A  PERFORM  statement  in  a  non-independent  segment  may  have  only  non-inde-  1NUC 
pendent  segments  or  may  have  only  sections  wholly  contained  in  a  single  in¬ 
dependent  segment  within  its  range. 

The  PERFORM  Statement  (continued) 

A  PERFORM  statement  in  an  independent  segment  may  have  only  non-independ-  1NUC 
ent  segments  or  may  have  only  sections  wholly  contained  within  the  same  inde¬ 
pendent  segment  within  its  range. 

Control  is  passed  only  once  for  each  execution  of  a  Format  2  PERFORM  state-  1NUC 
ment. 

Section  II — Table  Handling 

The  Table  Handling  module  is  divided  into  two  levels:  1TBL  (low  level)  and  2TBL  (high  level). 
1TBL  contains  the  elements  which  appear  in  levels  1  and  2  of  the  1968  COBOL  Standard;  2TBL 
contains  the  elements  which  appeared  in  level  3  of  the  1968  COBOL  Standard. 

ADDITIONS 

Literals  and  index-names  may  be  mixed  in  a  table  reference 
An  index  may  be  set  up  or  down  by  a  negative  value. 

DELETIONS 
None. 

CHANGES  ( NOT  REQUIRING  PROGRAM  MODIFICATION) 

Punctuation 

Period,  comma  or  semicolon  may  be  preceded  by  a  space. 

Parenthesis  enclosing  subscripts  need  not  be  preceded  by  a  space 
The  SET  Statement 

Integer  may  be  negative  in  Format  2  of  the  SET  statement. 

CHANGES  ( REQUIRING  PROGRAM  MODIFICATION) 

The  OCCURS  Clause 

OCCURS  DEPENDING  ON  clause  may  only  be  followed  within  the  record  des¬ 
cription  by  data  description  entries  subordinate  to  it. 

The  DEPENDING  ON  clause  is  now  required  in  a  Format  2  OCCURS  clause. 

Integer-1  cannot  be  zero  in  a  Format  2  OCCURS  clause. 

When  a  group  item,  having  subordinate  to  it  an  entry  that  specifies  Format  2  of 
the  OCCURS  clause,  is  referenced,  only  that  part  of  the  table  area  which  is 
defined  by  the  value  of  the  operand  of  the  DEPENDING  ON  phrase  will  be 
used  in  the  operation.  (The  actual  size  of  the  variable-length  item  is  used.) 
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Section  II — Table  Handling  (continued) 

CHANGES  ( REQUIRING  PROGRAM  MODIFICATIONS )  (continued) 

The  SEARCH  Statement 

The  object  of  the  condition  in  the  WHEN  phrase  of  the  SEARCH  ALL  state-  2TBL 
ment  cannot  be  a  data  item  named  in  the  KEY  phrase  of  the  referenced  table. 

OTHER  CHANGES  ( See  Paragraph  III  above) 

The  OCCURS  Clause 

If  the  SYNCHRONIZED  clause  is  specified  for  an  item  containing  the  OCCURS  1TBL 
clause,  any  implied  FILLER  generated  for  items  in  the  table  are  generated  for 
each  occurrence  of  those  items. 

The  SEARCH  Statement 

The  results  of  a  SEARCH  ALL  operation  are  predictable  only  when  the  data  in  2TBL 
the  table  is  ordered  as  described  by  the  ASCENDING/DESCENDING  KEY 
clause  associated  with  identifier-1. 

If  identifier-2  of  the  VARYING  clause  of  the  SEARCH  statement  is  an  index  2TBL 
data  item,  it  is  incremented  as  the  associated  index  is  incremented. 


Section  III — Sequential  1-0 


The  Sequential  1-0  module  consists  of  two  levels:  1SEQ  (low  level)  and  2SEQ  (high  level). 
ADDITIONS 

The  File-Control  Paragraph /Entry 

The  FILE  STATUS  clause  of  the  SELECT  clause  of  the  File-Control  entry  spe-  TSEQ 
cifies  the  data-name  which  indicates  the  status  of  execution  of  a  statement  that 
references  the  file. 

The  ORGANIZATION  IS  SEQUENTIAL  clause  of  the  SELECT  clause  of  the  1SEQ 
File-Control  entry  specifies  the  logical  structure  of  a  file. 

The  RESERVE  integer  AREAS  clause  of  the  SELECT  clause  of  the  File-Con-  2SEQ 
trol  entry  specifies  the  number  of  input-output  areas  allocated  for  the  file  rec¬ 
ords. 

The  File  Description  Entry 

The  CODE-SET  clause  of  the  File  Description  entry  specifies  the  character  code  1SEQ 
set  used  to  represent  data  on  the  external  media. 

The  LINAGE  clause  of  the  File  Description  entry  provides  a  means  for  specifying  2SEQ 
the  depth  of  a  logical  page  and  the  size  of  the  top  and  bottom  margins  on  the 
logical  page. 

The  CLOSE  Statement 

The  FOR  REMOVAL  clause  of  the  CLOSE  statement  specifies  that  a  reel/unit  2SEQ 
is  logically  removed  from  the  run  unit. 
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Section  III — Sequential  1-0  (continued) 

ADDITIONS  (continued) 

The  OPEN  Statement 

The  EXTEND  clause  of  the  OPEN  statement  positions  the  file  immediately  fol¬ 
lowing  the  last  logical  record  previously  written  on  that  file  (so  that  addition¬ 
al  records  can  be  placed  on  the  file). 

The  REWRITE  Statement 

The  REWRITE  statement  logically  replaces  a  record  existing  in  a  mass  storage 
file. 

The  WRITE  Statement 

The  PAGE  clause  of  the  BEFORE/AFTER  ADVANCING  clause  of  the  WRITE 
statement  controls  presentation  of  a  line  before  or  after  advancing  to  the  next 
logical  page. 

The  END-OF-PAGE  clause  of  the  WRITE  statement  provides  programmer  con¬ 
trol  when  the  end  of  a  logical  page  is  reached. 

The  USE  Statement 

An  EXCEPTION  clause  was  added  to  the  USE  AFTER  STANDARD  PROCE¬ 
DURE  statement.  This  function  includes  invocation  of  the  associated  procedure 
for  both  error  (e.g.,  INVALID  KEY)  or  exception  (e.g.,  AT  END)  conditions. 

DELETIONS 
User-Defined  Labels 

The  facility  to  define,  initialize  and  access  user-defined  labels  was  deleted.  The  de¬ 
letion  includes  data-names  option  of  LABEL  RECORDS  clause  and  the  USE 
statement  option  for  label  processing. 

The  File-Control  Entry 

The  FILE-LIMITS  clause  in  the  File-Control  entry  was  deleted. 

The  integer  phrase  of  the  ASSIGN  clause  in  the  File-Control  entry  was  deleted. 
The  MULTIPLE  REEL/UNIT  clause  in  the  File-Control  entry  was  deleted. 

The  WRITE  Statement 

The  INVALID  KEY  clause  of  the  WRITE  statement  was  deleted.  This  function  is 
now  handled  by  the  FILE-STATUS  clause. 

CHANGES  (NOT  REQUIRING  PROGRAM  MODIFICATION) 

The  CLOSE  Statement 

The  CLOSE  statement  with  NO  REWIND  clause  applies  to  all  devices  for  which 
support  is  claimed. 

The  OPEN  Statement 

The  OPEN  statement  with  the  INPUT  clause  and  the  OPEN  statement  with  the 
1-0  clause  makes  the  record  area  available  to  the  programmer. 
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Section  III — Sequential  1-0  (continued) 

CHANGES  ( NOT  REQUIRING  PROGRAM  MODIFICATION)  (continued) 

The  OPEN  statement  with  NO  REWIND  clause  applies  to  all  devices  for  which  2SEQ 
support  is  claimed. 

The  OPEN  statement  with  the  REVERSED  clause  applies  to  all  devices  for  which  2SEQ 
support  is  claimed. 

The  READ  Statement 

The  AT  END  phrase  of  the  READ  statement  need  not  be  specified  if  an  ap-  1SEQ 
plicable  USE  FOR  ERROR/EXCEPTION  procedure  is  specified. 

CHANGES  (REQUIRING  PROGRAM  MODIFICATION) 

The  VALUE  OF  Clause 

The  data-name  phrase  in  the  VALUE  OF  clause  was  changed  to  an  imple-  1SEQ 
mentor-name  phrase. 

The  CLOSE  Statement 

The  ability  to  use  the  CLOSE  statement  with  the  REEL  or  UNIT  phrase  to-  1SEQ 
gether  with  the  LOCK  phrase  was  deleted. 

The  OPEN  Statement 

The  REVERSED  clause  of  the  OPEN  statement  now  automatically  positions  2SEQ 
the  file  at  its  end  without  programmer  intervention. 

The  USE  Statement 

The  recursive  invocation  of  USE  procedures  is  prohibited.  1SEQ 

OTHER  CHANGES  (See  Paragraph  III  above) 

File  Description  Entry 

The  File  Description  entry  for  file-name  must  be  equal  to  that  used  when  the  file  1SEQ 
was  created. 


Section  IV — Random  Access 

The  Random  Access  module  was  deleted. 

It  is  replaced  by  two  new  modules — Relative  1-0  and  Indexed  I-O.  There  is  a  functional  and  syn¬ 
tactic  similarity  between  the  new  Relative  1-0  module  and  the  previous  Random  Access  module; 
however,  the  Indexed  1-0  module  has  no  functional  equivalent  in  the  previous  Federal  COBOL 
Standard. 

The  replacement  deleted  or  changed  a  number  of  facilities  previously  included  in  the  Random  Ac¬ 
cess  module.  The  changed  facilities  are  included  in  the  discussion  of  Relative  1-0  and  Indexed  I-O. 
The  deleted  facilities  are : 

User-Defined  Labels 

The  facility  to  define,  initialize  and  access  user-defined  labels  was  deleted.  (Data-names  op¬ 
tion  of  LABEL  RECORDS  clause  and  the  USE  statement  option  for  label  processing.) 
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Section  IV — Random  Access  (continued) 

The  File-Control  Entry 

The  ACTUAL  KEY  clause  of  the  File-Control  entry  was  deleted. 

The  PROCESSING  MODE  clause  of  the  File-Control  entry  was  deleted. 

The  FILE-LIMITS  clause  of  the  File-Control  entry  was  deleted. 

The  SEEK  Statement 

The  SEEK  statement  was  deleted. 

Section  V — Relative  1-0 

This  is  a  new  module  consisting  of  three  levels,  one  of  which  is  null.  The  two  non-null  levels  are : 
1REL  (low  level)  and  2REL  (high  level).  The  Relative  1-0  module  includes  the  following  major 
features : 

The  File-Control  Paragraph/Entry 

An  ACCESS  MODE  clause  specifies  random,  sequential  or  dynamic  (both  ran-  1REL* 
dom  and  sequential)  access.  2REL* 

The  File-Control  paragraph  names  the  file  and  specifies  other  file-related  informa-  1REL 
tion. 

The  RELATIVE  KEY  clause  of  the  ACCESS  MODE  clause  of  the  SELECT  1REL 
clause  of  the  File-Control  entry  specifies  the  key  for  a  retrieval  generated  by  the 
START  statement. 

The  FILE-STATUS  clause  of  the  SELECT  clause  of  the  File-Control  entry  indi-  1REL 
cates  the  status  of  execution  of  a  statement  that  references  the  file. 

The  ORGANIZATION  IS  RELATIVE  clause  of  the  select  clause  of  the  File-  1REL 
Control  entry  specifies  the  logical  structure  of  a  file. 

The  RESERVE  integer  AREAS  clause  of  the  SELECT  clause  of  the  File-Control  1REL 
entry  specifies  the  number  of  input-output  areas  allocated  for  the  file  records. 

The  DELETE  Statement 

The  DELETE  statement  logically  removes  a  record  from  a  mass  storage  file.  1REL 
The  READ  Statement 

The  NEXT  clause  of  the  READ  statement  specifies  that  the  next  logical  record  2REL 
relative  to  the  last  one  retrieved  is  to  be  retrieved. 

The  REWRITE  Statement 

The  REWRITE  statement  logically  replaces  a  record  existing  in  a  mass  storage  1REL 
file. 

The  START  Statement 

The  START  statement  logically  positions  the  Current  Record  Pointer  within  a  2REL 
relative  file  for  subsequent  sequential  retrieval  of  records. 

*  Dynamic  access  is  in  2REL  only;  Random  and  Sequential  access  are  in  1REL  and 
2REL. 
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Section  V — Relative  1-0  (continued) 

The  USE  Statement 

The  USE  AFTER  STANDARD  ERR  OR/EXCEPTION  statement  provides  pro-  1REL 
cedures  for  error  or  exception  handling. 

In  addition  to  the  major  features  detailed  above,  a  number  of  changes  have  been  made  to  fea¬ 
tures  which  originally  were  included  in  the  Random  Access  module.  The  major  changes  include: 

File  Description  Entry 

A  File  Description  entry  for  file-name  must  be  equal  to  that  used  when  the  file  1REL 
was  created 

The  OPEN  Statement 

The  OPEN  FOR  INPUT  statement  and  the  OPEN  FOR  1-0  statement  make  the  1REL 
record  area  available  to  the  programmer. 

The  READ  Statement 

The  AT  END  phrase  and  the  INVALID  KEY  phrase  of  the  READ  statement  1REL 
need  not  be  specified  if  an  applicable  USE  AFTER  ERROR/EXCEPTION  pro¬ 
cedure  is  specified. 

The  WRITE  Statement 

The  INVALID  KEY  clause  of  the  WRITE  statement  need  not  be  specified  if  an  1REL 
applicable  USE  AFTER  STANDARD  ERROR/EXCEPTION  statement  is 
specified. 

The  USE  Statement 

Recursive  invocation  of  USE  procedures  is  prohibited.  1REL 


Section  VI — Indexed  1-0 

This  is  a  new  module  consisting  of  three  levels,  one  of  which  is  null.  The  two  non-null  levels  are 
1INX  (low  level)  and  2INX  (high  level).  The  Indexed  1-0  module  includes  the  following  major 
features : 

The  File-Control  Paragraph/Entry 

The  File-Control  paragraph  names  the  file  and  specifies  other  file-related  infor-  1INX 
mation. 

The  ACCESS  MODE  clause  specifies  random,  sequential  or  dynamic  (both  ran-  1INX* 
dom  and  sequential)  access.  2INX* 

The  ALTERNATE  RECORD  KEY  clause  of  the  SELECT  clause  of  the  File-Con-  2INX 
trol  entry  provides  an  alternate  access  path  to  records  in  the  file. 

The  FILE-STATUS  clause  of  the  SELECT  clause  of  the  File-Control  entry  speci-  1INX 
fies  the  data-name  which  indicates  the  status  of  execution  of  a  statement  that 
references  the  file. 


*  Dynamic  access  is  in  2INX  only ;  Random  and  Sequential  access  are  in  1INX. 
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Section  VI — Indexed  1-0  (continued) 

The  ORGANIZATION  IS  INDEXED  clause  of  the  SELECT  clause  of  the  File-  1INX 
Control  entry  specifies  the  logical  structure  of  a  file. 

The  RECORD  KEY  clause  of  the  SELECT  clause  of  the  File-Control  entry  speci-  1INX 
fies  the  prime  record  key  for  the  file. 

The  RESERVE  integer  AREAS  clause  of  the  SELECT  clause  File-Control  entry  2INX 
specifies  the  number  of  input-output  areas  allocated  for  the  file  records. 

The  DELETE  Statement 

The  DELETE  statement  logically  removes  a  record  from  a  mass  storage  file.  1INX 
The  READ  Statement 

The  KEY  IS  clause  of  the  READ  statement  establishes  the  key  for  a  retrieval  2INX 
from  the  file  if  the  key  is  different  from  the  prime  record  key. 

The  START  Statement 

The  START  statement  logically  positions  the  Current  Record  Pointer  within  an  2INX 
indexed  file  for  subsequent  sequential  retrieval  of  records. 

The  REWRITE  Statement 

The  REWRITE  statement  logically  replaces  a  record  in  a  mass  storage  file.  1INX 

The  USE  Statement 

The  USE  AFTER  STANDARD  ERROR/EXCEPTION  statement  provides  pro-  1INX 
cedures  for  error  or  exception  handling. 

In  addition  to  the  major  features  detailed  above,  a  number  of  changes  have  been  made  to  features 
which  originally  were  included  in  the  Random  Access  module  which  affect  the  Indexed  1-0  module. 
These  major  changes  include : 

File  Description  Entry 

A  File  Description  entry  for  file-name  must  be  equal  to  that  used  when  the  file  1INX 
was  created. 

The  OPEN  Statement 

The  OPEN  INPUT  statement  and  the  OPEN  1-0  statement  make  the  record  1INX 
area  available  to  the  programmer. 

The  READ  Statement 

The  AT  END  phrase  and  the  INVALID  KEY  phrase  of  the  READ  statement  need  1INX 
not  be  specified  if  an  applicable  USE  AFTER  ERROR/EXCEPTION  pro¬ 
cedure  is  specified. 

The  WRITE  Statement 

The  INVALID  KEY  clause  of  the  WRITE  statement  need  not  be  specified  if  an  1INX 
applicable  USE  AFTER  STANDARD  ERROR/EXCEPTION  statement  is 
specified. 

The  USE  Statement 

Recursive  invocation  of  USE  procedures  is  prohibited.  1INX 
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Section  VII — Sort-Merge 

This  module  replaces  the  Sort  module  contained  in  the  previous  Federal  COBOL  Standard.  It 
contains  three  levels,  one  of  which  is  null.  The  two  non-null  levels  are:  1SRT  (low  level)  and  2SRT 
(high  level). 

ADDITIONS 

The  I-O-CONTROL  Paragraph 

The  SORT-MERGE  option  was  added  to  the  SAME  AREA  clause.  2SRT 

The  MERGE  Statement 

The  MERGE  statement  combines  two  or  more  identically  sequenced  files.  2SRT 

The  SORT  Statement 

The  COLLATING  SEQUENCE  clause  of  the  SORT  statement  establishes  the  col-  2SRT 
lating  sequence  for  the  sort  if  it  is  different  from  the  program  collating  sequence. 

The  USING  file-name  series  of  the  SORT  statement  specifies  the  files  to  be  2SRT 
sorted.  Formerly  only  one  file  was  named  in  a  USING  clause. 

DELETIONS 

The  OR  implementor-name  option  of  the  ASSIGN  TO  clause  of  the  SELECT  1SRT 
clause  of  the  FILE-CONTROL  paragraph  was  deleted. 

CHANGES  (NOT  REQUIRING  PROGRAM  MODIFICATION) 

None. 

CHANGES  (REQUIRING  PROGRAM  MODIFICATION) 

The  SORT  Statement 

Semicolon  was  deleted  from  the  SORT  statement  format.  1SRT 

No  more  than  one  file-name  from  a  multiple-file  reel  can  appear  in  a  SORT  2SRT 
statement. 

When  a  SORT  (or  MERGE)  statement  appears  in  a  non-independent  segment,  1SRT 
any  associated  input-output  procedures  must  appear  only  in  non-independent  seg¬ 
ments  or  must  appear  only  in  sections  wholly  contained  in  a  single  independent 
segment. 

When  a  SORT  (or  MERGE)  statement  appears  in  an  independent  segment  any  1SRT 
associated  input-output  procedures  must  appear  only  in  a  non-independent  seg¬ 
ment  or  must  appear  only  in  sections  wholly  contained  in  the  same  independent 
segment. 

OTHER  CHANGES  (See  Paragraph  III  above) 

None. 


A-13 


FIPS  PUB  43 


Section  VIII — Report  Writer 

The  Report  Writer  specifications  are  an  optional  appendage  to  the  Federal  levels  to  be  used  by 
agencies  when  the  acquisition  of  a  COBOL  Report  Writer  facility  is  required.  The  Report  Writer 
specifications  contained  in  the  1974  Standard  are  a  complete  revision  and  rewrite  of  the  Report 
Writer  specifications  excluded  from  the  previous  Federal  Standard.  The  two  versions  of  the  Re¬ 
port  Writer  specifications  are  not  compatible. 

The  Report  Writer  module  contains  two  levels,  one  of  which  is  null. 

Following  is  a  list  of  the  major  report  writer  features: 

A  Report  Section  in  the  Data  Division,  consisting  of  one  or  more  Report  Description  (RD) 
entries. 

A  COLUMN  NUMBER  clause  for  horizontal  spacing. 

A  LINE  NUMBER  clause  for  vertical  spacing. 

A  NEXT  GROUP  clause  for  spacing  after  the  last  line  of  a  group. 

A  PAGE  clause  to  specify  the  length  of  the  page,  heading  and  footing  areas,  and  the  area  on 
which  the  detail  line  appears. 

A  SOURCE  clause  for  sending  data  items  to  the  printable  items. 

A  SUM  clause  for  establishment  of  a  sum  counter. 

A  VALUE  clause  for  defining  a  literal  that  appears  in  the  printable  item. 

The  GENERATE  statement  for  formatting  detail  report  groups. 

The  INITIATE  statement  to  initialize  functions. 

The  SUPPRESS  statement  to  suppress  printing  of  a  report  group. 

The  TERMINATE  statement  to  terminate  a  report. 

The  USE  BEFORE  REPORTING  statement. 

Section  IX — Segmentation 

This  module  contains  three  levels,  one  of  which  is  null.  The  non-null  levels  are:  1SEG  (low  level) 
and  2SEG  (high  level). 

ADDITIONS 

None. 

DELETIONS 

None. 

CHANGES  (NOT  REQUIRING  PROGRAM  MODIFICATION) 

Segment-N  umbers 

Sections  in  declaratives  may  have  segment-numbers.  1SEG 

All  restrictions  were  deleted  on  the  range  of  a  PERFORM  statement  involving  2SEG 
fixed  overlayable  segments. 
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Section  IX — Segmentation  (continued) 

CHANGES  (REQUIRING  PROGRAM  MODIFICATIONS) 

The  SORT  and  MERGE  Statements 

The  input-output  procedure  associated  with  a  SORT  or  MERGE  statement 
which  appear  in  a  non-independent  segment  may  have  only  non-independent  seg¬ 
ments  or  may  have  only  sections  wholly  contained  in  a  single  independent  seg¬ 
ment  within  its  range. 

The  input-output  procedure  associated  with  a  SORT  or  MERGE  statement 
which  appears  in  an  independent  segment  may  have  only  non-independent  seg¬ 
ments  or  may  have  only  sections  wholly  contained  in  the  same  independent  seg¬ 
ment  within  its  range. 

OTHER  CHANGES  (See  Paragraph  III  above) 

The  PERFORM  Statement 

Control  is  passed  only  once  for  each  execution  of  a  Format  2  PERFORM  state¬ 
ment. 

PERFORM  statements  which  appear  in  a  non-independent  segment  may  have 
only  non-independent  segments  or  may  have  only  sections  wholly  contained  in 
a  single  independent  segment  within  its  range. 

PERFORM  statements  which  appear  in  an  independent  segment  may  have  only 
non-independent  segments  or  may  have  only  sections  wholly  contained  in  the 
same  independent  segment  within  its  range. 

Section  X — Library 

This  module  contains  three  levels,  one  of  which  is  null.  The  non-null  levels  are :  1LIB 
and  2LIB  (high  level) . 

ADDITIONS 

More  than  one  library  can  be  available. 

All  occurrences  of  defined  groups  of  words  in  the  library  text  can  be  replaced. 
DELETIONS 
None. 

CHANGES  (NOT  REQUIRING  PROGRAM  MODIFICATION) 

A  COPY  statement  may  appear  any  place  in  the  program  that  a  COBOL  word 
or  separator  may  appear. 

CHANGES  (REQUIRING  PROGRAM  MODIFICATION) 

None. 

OTHER  CHANGES  (See  Paragraph  III  above) 

Library-name  is  now  a  user-defined  word. 

The  effect  of  processing  a  COPY  statement  is  that  the  library  text  is  copied  logi¬ 
cally,  replacing  the  entire  COPY  statement,  beginning  with  the  reserved  word 
COPY  and  ending  with  the  period. 


1SEG 


liSEG 

1SEG 

1SEG 


(low  level) 

2LIB 

2LIB 


1LIB 


2LIB 

1LIB 
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Section  XI — Debug 

This  is  a  new  module  containing  three  levels,  one  of  which  is  null.  The  non-null  levels  are:  1DEB 
(low  level)  and  2DEB  (high  level). 

The  Debug  module  contains  the  following  major  features: 

A  USE  FOR  DEBUGGING  statement  identifies  the  items  to  be  monitored. 

The  Special  Register  DEBUG-ITEM  provides  information  about  the  conditions  that  caused  the 
execution  of  a  debugging  section. 

The  WITH  DEBUGGING  MODE  clause  of  the  SOURCE-COMPUTER  paragraph  serves  as  a 
compile-time  switch  over  the  debugging  statements  in  a  program. 

Debugging  lines  ‘D’  in  character  position  7  (Indicator  Area),  identifies  a  line  of  coding  which 
applies  only  to  debugging. 

Section  XII — Inter-Program  Communication 

This  is  a  new  module  containing  three  levels,  one  of  which  is  null.  The  non-null  levels  are  1IPC  (low 
level)  and  2IPC  (high  level) . 

The  Inter-Program  Communication  module  consists  of  the  following  major  features: 

A  USING  phrase  in  the  Procedure  Division  header  associates  the  data  items  in  the  called  pro¬ 
gram  with  the  data  items  in  the  calling  program. 

The  LINKAGE  SECTION  describes  data  items  common  to  the  called  and  calling  programs. 

The  CALL  statement  causes  control  to  be  transferred  from  one  object  program  to  another. 

The  CANCEL  statement  releases  the  memory  areas  occupied  by  the  called  program. 

The  EXIT  PROGRAM  statement  marks  the  logical  end  of  a  called  program  causing  control  to 
be  returned  to  the  calling  program. 

Section  XIII — Communication 

This  is  a  new  module  containing  three  levels,  one  of  which  is  null.  The  non-null  levels  are:  1COM 
(low  level)  and  2COM  (high  level) . 

The  Communication  module  consists  of  the  following  major  features: 

The  Communication  Section  with  a  Communication  Description  (CD)  entry  specifies  the  inter¬ 
face  area  between  the  message  control  system  and  a  COBOL  program. 

The  ACCEPT  MESSAGE  COUNT  statement  causes  the  message  control  system  to  indicate  to 
the  COBOL  program  the  number  of  complete  messages  in  a  specific  queue. 

The  DISABLE  statement  breaks  a  logical  connection  between  the  message  control  system  and 
one  or  more  given  communications  devices. 

The  ENABLE  statement  establishes  a  logical  connection  between  the  message  control  system 
and  one  or  more  given  communications  devices. 

The  RECEIVE  statement  causes  data  in  a  queue  to  be  passed  to  the  COBOL  program. 

The  SEND  statement  causes  data  associated  with  the  COBOL  program  to  be  passed  to  one  or 
more  queues. 
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Section  XIV — Reserved  Words 

It 


ADDITIONS 


ALSO 

DYNAMIC 

REFERENCES 

BOTTOM 

EGI 

RELATIVE 

CALL 

EMI 

REMOVAL 

CANCEL 

ENABLE 

REWRITE 

CD 

END-OF-PAGE 

SEGMENT 

CHARACTER 

EOP 

SEND 

CODE-SET 

ESI 

SEPARATE 

COLLATING 

EXCEPTION 

SEQUENCE 

COMMUNICATION 

EXTEND 

SORT-MERGE 

COUNT 

INITIAL 

STANDARD-1 

DATE 

INSPECT 

START 

DAY 

LENGTH 

STRING 

DEBUG-CONTENTS 

LINAGE 

SUB-QUEUE-1 

DEBUG-ITEM 

LINAGE-COUNTER 

SUB-QUEUE-2 

DEBUG-LINE 

LINKAGE 

SUB-QUEUE-3 

DEBUG-NAME 

MERGE 

SUPPRESS 

DEBUG-SUB-1 

MESSAGE 

SYMBOLIC 

DEBUG-SUB-2 

NATIVE 

TABLE 

DEBUG-SUB-3 

ORGANIZATION 

TERMINAL 

DEBUGGING 

OVERFLOW 

TEXT 

DELETE 

POINTER 

TIME 

DELIMITED 

PRINTING 

TOP 

DELIMITER 

PROCEDURES 

TRAILING 

DESTINATION 

PROGRAM 

UNSTRING 

DISABLE 

QUEUE 

DUPLICATES 

RECEIVE 

DELETIONS 

ACTUAL 

EXAMINE 

NOTE 

ADDRESS 

FILE-LIMIT 

PROCESSING 

BEGINNING 

FILE-LIMITS 

REMARKS 

ENDING 

KEYS 

SEEK 

TALLY 

I 
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APPENDIX  B 


COMPOSITE  LANGUAGE  SKELETON 
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NBS  TECHNICAL  PUBLICATIONS 


PERIODICALS 

JOURNAL  OF  RESEARCH  reports  National  Bureau 
of  Standards  research  and  development  in  physics, 
mathematics,  and  chemistry.  It  is  published  in  two  sec¬ 
tions,  available  separately: 

•  Physics  and  Chemistry  (Section  A) 

Papers  of  interest  primarily  to  scientists  working  in 
these  fields.  This  section  covers  a  broad  range  of  physi¬ 
cal  and  chemical  research,  with  major  emphasis  on 
standards  of  physical  measurement,  fundamental  con¬ 
stants,  and  properties  of  matter.  Issued  six  times  a 
year.  Annual  subscription:  Domestic,  $17.00;  Foreign, 
$21.25. 

•  Mathematical  Sciences  (Section  B) 

Studies  and  compilations  designed  mainly  for  the  math¬ 
ematician  and  theoretical  physicist.  Topics  in  mathe¬ 
matical  statistics,  theory  of  experiment  design,  numeri¬ 
cal  analysis,  theoretical  physics  and  chemistry,  logical 
design  and  programming  of  computers  and  computer 
systems.  Short  numerical  tables.  Issued  quarterly.  An¬ 
nual  subscription:  Domestic,  $9.00;  Foreign,  $11.25. 

DIMENSIONS/NBS  (formerly  Technical  News  Bul¬ 
letin) — This  monthly  magazine  is  published  to  inform 
scientists,  engineers,  businessmen,  industry,  teachers, 
students,  and  consumers  of  the  latest  advances  in 
science  and  technology,  with  primary  emphasis  on  the 
work  at  NBS.  The  magazine  highlights  and  reviews  such 
issues  as  energy  research,  fire  protection,  building  tech¬ 
nology,  metric  conversion,  pollution  abatement,  health 
and  safety,  and  consumer  product  performance.  In  addi¬ 
tion,  it  reports  the  results  of  Bureau  programs  in 
measurement  standards  and  techniques,  properties  of 
matter  and  materials,  engineering  standards  and  serv¬ 
ices,  instrumentation,  and  automatic  data  processing. 

Annual  subscription:  Domestic,  $9.45;  Foreign,  $11.85. 

NONPERIODICALS 

Monographs — Major  contributions  to  the  technical  liter¬ 
ature  on  various  subjects  related  to  the  Bureau’s  scien¬ 
tific  and  technical  activities. 

Handbooks — Recommended  codes  of  engineering  and 
industrial  practice  (including  safety  codes)  developed 
in  cooperation  with  interested  industries,  professional 
organizations,  and  regulatory  bodies. 

Special  Publications — Include  proceedings  of  confer¬ 
ences  sponsored  by  NBS,  NBS  annual  reports,  and  other 
special  publications  appropriate  to  this  grouping  such 
as  wall  charts,  pocket  cards,  and  bibliographies. 

Applied  Mathematics  Series — Mathematical  tables, 
manuals,  and  studies  of  special  interest  to  physicists, 
engineers,  chemists,  biologists,  mathematicians,  com¬ 
puter  programmers,  and  others  engaged  in  scientific 
and  technical  work. 

National  Standard  Reference  Data  Series — Provides 
quantitative  data  on  the  physical  and  chemical  proper¬ 
ties  of  materials,  compiled  from  the  world’s  literature 
and  critically  evaluated.  Developed  under  a  world-wide 


program  coordinated  by  NBS.  Program  under  authority 
of  National  Standard  Data  Act  (Public  Law  90-396). 

NOTE:  At  present  the  principal  publication  outlet  for 
these  data  is  the  Journal  of  Physical  and  Chemical 
Reference  Data  (JPCRD)  published  quarterly  for  NBS 
by  the  American  Chemical  Society  (ACS)  and  the  Amer¬ 
ican  Institute  of  Physics  (AIP).  Subscriptions,  reprints, 
and  supplements  available  from  ACS,  1155  Sixteenth 
St.  N.  W„  Wash.  D.  C.  20056. 

Building  Science  Series — Disseminates  technical  infor¬ 
mation  developed  at  the  Bureau  on  building  materials, 
components,  systems,  and  whole  structures.  The  series 
presents  research  results,  test  methods,  and  perform¬ 
ance  criteria  related  to  the  structural  and  environmen¬ 
tal  functions  and  the  durability  and  safety  character¬ 
istics  of  building  elements  and  systems. 

Technical  Notes — Studies  or  reports  which  are  complete 
in  themselves  but  restrictive  in  their  treatment  of  a 
subject.  Analogous  to  monographs  but  not  so  compre¬ 
hensive  in  scope  or  definitive  in  treatment  of  the  sub¬ 
ject  area.  Often  serve  as  a  vehicle  for  final  reports  of 
work  performed  at  NBS  under  the  sponsorship  of  other 
government  agencies. 

Voluntary  Product  Standards — Developed  under  pro¬ 
cedures  published  by  the  Department  of  Commerce  in 
Part  10,  Title  15,  of  the  Code  of  Federal  Regulations. 
The  purpose  of  the  standards  is  to  establish  nationally 
recognized  requirements  for  products,  and  to  provide 
all  concerned  interests  with  a  basis  for  common  under¬ 
standing  of  the  characteristics  of  the  products.  NBS 
administers  this  program  as  a  supplement  to  the  activi¬ 
ties  of  the  private  sector  standardizing  organizations. 

Federal  Information  Processing  Standards  Publications 
(FIPS  PUBS) — Publications  in  this  series  collectively 
constitute  the  Federal  Information  Processing  Stand¬ 
ards  Register.  Register  serves  as  the  official  source  of 
information  in  the  Federal  Government  regarding  stand¬ 
ards  issued  by  NBS  pursuant  to  the  Federal  Property 
and  Administrative  Services  Act  of  1949  as  amended, 
Public  Law  89-306  (79  Stat.  1127),  and  as  implemented 
by  Executive  Order  11717  (38  FR  12315,  dated  May  11, 
1973)  and  Part  6  of  Title  15  CFR  (Code  of  Federal 
Regulations). 

Consumer  Information  Series — Practical  information, 
based  on  NBS  research  and  experience,  covering  areas 
of  interest  to  the  consumer.  Easily  understandable 
language  and  illustrations  provide  useful  background 
knowledge  for  shopping  in  today’s  technological 
marketplace. 

NBS  Interagency  Reports  (NBSIR) — A  special  series  of 
interim  or  final  reports  on  work  performed  by  NBS  for 
outside  sponsors  (both  government  and  non-govern¬ 
ment).  In  general,  initial  distribution  is  handled  by  the 
sponsor;  public  distribution  is  by  the  National  Technical 
Information  Service  (Springfield,  Va.  22161)  in  paper 
copy  or  microfiche  form. 


Order  NBS  publications  (except  NBSIR’s  and  Biblio¬ 
graphic  Subscription  Services)  from:  Superintendent  of 
Documents,  Government  Printing  Office,  Washington, 
D.C.  20402. 


BIBLIOGRAPHIC  SUBSCRIPTION  SERVICES 


The  following  current-awareness  and  literature-survey 
bibliographies  are  issued  periodically  by  the  Bureau: 
Cryogenic  Data  Center  Current  Awareness  Service 

A  literature  survey  issued  biweekly.  Annual  sub¬ 
scription:  Domestic,  $20.00;  foreign,  $25.00. 

Liquefied  Natural  Gas.  A  literature  survey  issued  quar¬ 
terly.  Annual  subscription:  $20.00. 

Superconducting  Devices  and  Materials.  A  literature 


survey  issued  quarterly.  Annual  subscription:  $20.00. 
Send  subscription  orders  and  remittances  for  the  pre¬ 
ceding  bibliographic  services  to  National  Technical 
Information  Service,  Springfield,  Va.  22161. 

Electromagnetic  Metrology  Current  Awareness  Service 
Issued  monthly.  Annual  subscription:  $100.00  (Spe¬ 
cial  rates  for  multi-subscriptions).  Send  subscription 
order  and  remittance  to  Electromagnetics  Division, 
National  Bureau  of  Standards,  Boulder,  Colo.  80302. 
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